home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / vmenu.arc / CURSOFF.ASM < prev    next >
Encoding:
Assembly Source File  |  1985-08-25  |  2.1 KB  |  85 lines
  1. codeseg   segment        para public 'code'
  2.           assume         cs:codeseg
  3.           public         cursoff_
  4. cursoff_  proc near
  5.           push           bp
  6.           mov            ah,15
  7.           int            10h
  8.           cmp            al,04
  9.           jc             textoff
  10.           cmp            al,7
  11.           jnz            nocur
  12. textoff:
  13.           mov            cx,0f00h
  14.           mov            ah,1
  15.           int            10h
  16. nocur:
  17.           pop            bp
  18.           ret
  19. cursoff_  endp
  20. ;
  21.           public         curson_
  22. curson_   proc           near
  23.           push           bp
  24.           mov            ah,15
  25.           int            10h
  26.           mov            cx,0c0dh
  27.           cmp            al,7
  28.           jz             newcur
  29.           mov            cx,0607h
  30.           cmp            al,4
  31.           jc             newcur
  32.           jmp            back
  33. newcur:
  34.           mov            ah,1
  35.           int            10h
  36. back:
  37.           pop            bp
  38.           ret
  39. curson_  endp
  40.  
  41.           public         bigcurs_
  42. bigcurs_  proc           near
  43.           push           bp
  44. ;          mov            ah,15
  45. ;          int            10h
  46. ;          mov            cx,0c0dh
  47. ;          cmp            al,7
  48. ;          jz             doit
  49. ;          mov            cx,0607h
  50. ;          cmp            al,4
  51. ;          jc             doit
  52. ;          jmp            fin
  53. doit:     mov             cx,020ah
  54.           mov            ah,1
  55.           int            10h
  56. fin:
  57.           pop            bp
  58.           ret
  59. bigcurs_  endp
  60.           public         smallcurs_
  61. smallcurs_   proc           near
  62.           push           bp
  63.           mov            ah,15
  64.           int            10h
  65.           mov            cx,0c0dh
  66.           cmp            al,7
  67.           jz             skip
  68.           mov            cx,0607h
  69.           cmp            al,4
  70.           jc             skip
  71.           jmp            quit
  72. skip:
  73.           mov            ah,1
  74.           int            10h
  75. quit:
  76.           pop            bp
  77.           ret
  78. smallcurs_  endp
  79.  
  80. codeseg   ends
  81.           end
  82.  
  83.  
  84.  
  85.